home *** CD-ROM | disk | FTP | other *** search
/ MacHome 1999 February/March / MacHome CD (February and March 1999).iso / Edutainment / INFOHIGHWAYDEMOS / demo / SEMAIL.DCR / 00582.ls < prev    next >
Encoding:
Text File  |  1999-12-02  |  914 b   |  23 lines
  1. on lockFields
  2.   global field_email_address_Status, field_cc_status, field_sujet_status
  3.   set field_email_address_Status to the editable of member "field_email_address"
  4.   set field_cc_status to the editable of member "field_cc"
  5.   set field_sujet_status to the editable of member "field_sujet"
  6.   set the editable of member "field_email_address" to 0
  7.   set the editable of member "field_cc" to 0
  8.   set the editable of member "field_sujet" to 0
  9. end
  10.  
  11. on resetFields
  12.   global field_email_address_Status, field_cc_status, field_sujet_status
  13.   set the editable of member "field_email_address" to field_email_address_Status
  14.   set the editable of member "field_cc" to field_cc_status
  15.   set the editable of member "field_sujet" to field_sujet_status
  16. end
  17.  
  18. on lockAllFields
  19.   set the editable of member "field_email_address" to 0
  20.   set the editable of member "field_cc" to 0
  21.   set the editable of member "field_sujet" to 0
  22. end
  23.